home *** CD-ROM | disk | FTP | other *** search
/ L' Effet Pommier 3 / L'Effet Pommier - Volume 03.iso / Bases de données / Roberto's Package Last Version / Dossier Éditer les scripts 2.0 / Éditer les scripts 2.1.2 / …diter les scripts 2.1.2 / cards.xml < prev    next >
Text File  |  1995-10-01  |  21KB  |  263 lines
  1. card_3683.xml
  2. <?xml version="1.0" encoding="utf-8" ?>
  3. <!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
  4. <card>
  5.     <id>3683</id>
  6.     <filler1>0</filler1>
  7.     <cantDelete> <true /> </cantDelete>
  8.     <showPict> <true /> </showPict>
  9.     <dontSearch> <true /> </dontSearch>
  10.     <owner>2598</owner>
  11.     <link rel="stylesheet" type="text/css" href="stylesheet_3284.css" />
  12.     <part>
  13.         <id>1</id>
  14.         <type>field</type>
  15.         <visible> <true /> </visible>
  16.         <dontWrap> <false /> </dontWrap>
  17.         <dontSearch> <true /> </dontSearch>
  18.         <sharedText> <false /> </sharedText>
  19.         <fixedLineHeight> <false /> </fixedLineHeight>
  20.         <autoTab> <false /> </autoTab>
  21.         <lockText> <true /> </lockText>
  22.         <rect>
  23.             <left>0</left>
  24.             <top>0</top>
  25.             <right>320</right>
  26.             <bottom>207</bottom>
  27.         </rect>
  28.         <style>scrolling</style>
  29.         <autoSelect> <false /> </autoSelect>
  30.         <showLines> <false /> </showLines>
  31.         <wideMargins> <true /> </wideMargins>
  32.         <multipleLines> <false /> </multipleLines>
  33.         <reservedFamily> 0 </reservedFamily>
  34.         <titleWidth>0</titleWidth>
  35.         <icon>0</icon>
  36.         <textAlign>left</textAlign>
  37.         <font>Geneva</font>
  38.         <textSize>12</textSize>
  39.         <textStyle>plain</textStyle>
  40.         <textHeight>16</textHeight>
  41.         <name></name>
  42.         <script>on mouseUpplay "1"go card "un"end mouseUp</script>
  43.     </part>
  44.     <content>
  45.         <layer>card</layer>
  46.         <id>1</id>
  47.         <text><span class="style2"></span><span class="style3">          </span><span class="style20">"</span><span class="style3"> ├ëditer les scripts 2.1.2 </span><span class="style20">"</span><span class="style3"></span><span class="style1">├⌐dite </span><span class="style4">toutes</span><span class="style1"> les piles mais ne modifie en rien les piles ├⌐dit├⌐es. L'├⌐dition peut se faire sur une pile en service. ├ëditer les scripts est ├⌐galement capable de s'auto-├⌐diter. Le pied, non ?Ainsi, vous pourrez conna├«tre tous les secrets des piles et vous pourrez avoir un r├⌐capitula- tif de vos scripts si vous programmez vos propres piles.Le document enregistr├⌐ est au format TEXT. En cas de document "lourd" (sup├⌐rieur ├á 32000 caract├¿res), Teachtext ou SimpleText ne pourront pas l'ouvrir. Si vous ne disposez pas d'une usine ├á gaz, o├╣ si vous n'avez pas envie d'y recourir, vous pouvez cr├⌐er un document partitionn├⌐. </span><span class="style3">Pour ce faire, enfoncez d'abord la touche ┬½ Option ┬╗ (alt) puis cliquez le bouton "Editer les scripts".</span><span class="style1"></span><span class="style5"></span><span class="style6"></span><span class="style1">ΓÇó "</span><span class="style3">├ëditer les scripts 2.1.2</span><span class="style1">", cr├⌐├⌐ avec HypercardΓäó 2.2 est </span><span class="style3">totalement</span><span class="style1"> compatible HypercardΓäó 2.0 minimum o├╣ Hypercard PlayerΓäó ( bien qu'avec ce dernier, vous ne puissiez pas programmer !!!!) .</span><span class="style7"></span><span class="style8">Enjoy ! Roberto :-&</span><span class="style9"></span><span class="style10">    </span><span class="style11">Les commandes et fonctions externes utilis├⌐es:</span><span class="style8"></span><span class="style5">           </span><span class="style8"> </span><span class="style9">         Son XCMD. ┬⌐ Auteur inconnu - Non r├⌐f├⌐renc├⌐e.        AddColor XCMD. ┬⌐ Apple Computer Inc. 1991-1993.         fileDataSize XFCN. ┬⌐ 1992 BungDabba Productions,          v0.12 by Mike Byrne. Traduction: Roberto Minotti.</span><span class="style12">                   ├ƒ├⌐ta testeur et ajusteur:                Jean Patrick "The Killer" Wendt.                       Autre ├ƒ├⌐ta testeur:                     Jean Pierre Ramognino.  </span><span class="style19"></span><span class="style14">Historique</span><span class="style12">:ΓÇó Version 1.2: - correction de plusieurs bogues sous Hypercard PlayerΓäó ( toujours lui ! ).- correction d'un bogue sous HypercardΓäó 2.0 pouvant d├⌐clarer un script inexistant.- correction d'un bogue emp├¬chant l'affichage couleur.ΓÇó Version 2.0:- possibilit├⌐ de cr├⌐er des documents partitionn├⌐s pour avoir la possibilit├⌐ de les ouvrir avec SimpleText. - correction des f├┤tes d'ortografes !ΓÇó Version 2.1.2:- am├⌐lioration interface/communication utilisateur.- d├⌐bogage du partitionnement.- d├⌐bogage chemins ( les sp├⌐cialistes comprendront cette plaie hypercardienne! ) </span><span class="style14">Diffusion</span><span class="style12">:├ëditer les scripts 2.1.2 est en diffusion et copie libre.Ne diffusez que des copies non modifi├⌐es, tant au niveau des scripts, du contenu que des ressources.</span><span class="style14">Support technique</span><span class="style12">:Si vous rencontrez un o├╣ des messages d'erreur, merci infiniment de me les rapporter en pr├⌐cisant si possible les "manipulations" qui ont pr├⌐c├⌐d├⌐, ainsi que votre configuration logicielle (version d' HypercardΓäó utilis├⌐e). Pr├⌐cisez bien si vous utilisez une version PlayerΓäó ainsi que son num├⌐ro de version.Renseignement(s), rapport(s) de bogue(s) et suggestion(s): </span><span class="style9">- Adresse ├⌐l├⌐ctronique:                             </span><span class="style15"><a href="#" class="group">rMinotti@MPadLink.TechLink.fr</a></span><span class="style9">- Adresse postale:</span><span class="style15"><a href="#" class="group">Roberto Minotti2, rue de la R├⌐publique69190 Saint-Fons. F.</a></span><span class="style9"></span></text>
  48.     </content>
  49.     <name>deux</name>
  50.     <script></script>
  51. </card>
  52.  
  53.  
  54. card_3005.xml
  55. <?xml version="1.0" encoding="utf-8" ?>
  56. <!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
  57. <card>
  58.     <id>3005</id>
  59.     <filler1>0</filler1>
  60.     <bitmap>BMAP_3962.pbm</bitmap>
  61.     <cantDelete> <true /> </cantDelete>
  62.     <showPict> <true /> </showPict>
  63.     <dontSearch> <true /> </dontSearch>
  64.     <owner>2598</owner>
  65.     <link rel="stylesheet" type="text/css" href="stylesheet_3284.css" />
  66.     <part>
  67.         <id>1</id>
  68.         <type>button</type>
  69.         <visible> <true /> </visible>
  70.         <reserved5> 0 </reserved5>
  71.         <reserved4> 0 </reserved4>
  72.         <reserved3> 0 </reserved3>
  73.         <reserved2> 0 </reserved2>
  74.         <reserved1> 0 </reserved1>
  75.         <enabled> <true /> </enabled>
  76.         <rect>
  77.             <left>0</left>
  78.             <top>168</top>
  79.             <right>42</right>
  80.             <bottom>208</bottom>
  81.         </rect>
  82.         <style>transparent</style>
  83.         <showName> <false /> </showName>
  84.         <highlight> <false /> </highlight>
  85.         <autoHighlight> <true /> </autoHighlight>
  86.         <sharedHighlight> <true /> </sharedHighlight>
  87.         <family>0</family>
  88.         <titleWidth>0</titleWidth>
  89.         <icon>0</icon>
  90.         <textAlign>center</textAlign>
  91.         <font>Chicago</font>
  92.         <textSize>12</textSize>
  93.         <textStyle>plain</textStyle>
  94.         <name>Bonus</name>
  95.         <script>on mouseUpif the optionkey is down thenpalette "Bonus"show window "Bonus" at -111,0elseanswer "Bien jou├⌐ ! vous avez gagn├⌐ le SUPER M├ëGA BONUS." with "K├⌐sako ???"palette "Bonus"show window "Bonus" at -111,0set cursor to watchwait 1 secondsplay "sifflement"answer "Alors, pas mal, hein ? Et c'est op├⌐rationnel !"&return&&return&&return&┬¼"ΓÇó Cette palette reste affich├⌐e si vous ouvrez d'autres piles. ΓÇó" with "Bonus"play "Hourra"end ifend mouseUp</script>
  96.     </part>
  97.     <part>
  98.         <id>5</id>
  99.         <type>button</type>
  100.         <visible> <true /> </visible>
  101.         <reserved5> 0 </reserved5>
  102.         <reserved4> 0 </reserved4>
  103.         <reserved3> 0 </reserved3>
  104.         <reserved2> 0 </reserved2>
  105.         <reserved1> 0 </reserved1>
  106.         <enabled> <true /> </enabled>
  107.         <rect>
  108.             <left>68</left>
  109.             <top>118</top>
  110.             <right>261</right>
  111.             <bottom>141</bottom>
  112.         </rect>
  113.         <style>shadow</style>
  114.         <showName> <true /> </showName>
  115.         <highlight> <false /> </highlight>
  116.         <autoHighlight> <true /> </autoHighlight>
  117.         <sharedHighlight> <true /> </sharedHighlight>
  118.         <family>0</family>
  119.         <titleWidth>0</titleWidth>
  120.         <icon>0</icon>
  121.         <textAlign>center</textAlign>
  122.         <font>Chicago</font>
  123.         <textSize>12</textSize>
  124.         <textStyle>plain</textStyle>
  125.         <name>Niveau sonore des alertes</name>
  126.         <script>on mouseUpbeepSonbeepend mouseUp</script>
  127.     </part>
  128.     <part>
  129.         <id>6</id>
  130.         <type>button</type>
  131.         <visible> <true /> </visible>
  132.         <reserved5> 0 </reserved5>
  133.         <reserved4> 0 </reserved4>
  134.         <reserved3> 0 </reserved3>
  135.         <reserved2> 0 </reserved2>
  136.         <reserved1> 0 </reserved1>
  137.         <enabled> <true /> </enabled>
  138.         <rect>
  139.             <left>68</left>
  140.             <top>149</top>
  141.             <right>260</right>
  142.             <bottom>171</bottom>
  143.         </rect>
  144.         <style>shadow</style>
  145.         <showName> <true /> </showName>
  146.         <highlight> <false /> </highlight>
  147.         <autoHighlight> <true /> </autoHighlight>
  148.         <sharedHighlight> <true /> </sharedHighlight>
  149.         <family>0</family>
  150.         <titleWidth>0</titleWidth>
  151.         <icon>0</icon>
  152.         <textAlign>center</textAlign>
  153.         <font>Chicago</font>
  154.         <textSize>12</textSize>
  155.         <textStyle>plain</textStyle>
  156.         <name>Taille de la section donn├⌐es</name>
  157.         <script>on mouseUpglobal gXCMDErroranswer file "Choisissez le fichier, quel qu'il soit, dont vous d├⌐sirez connaitre la taille de la section des donn├⌐es (Data Fork) :"  --Γêåput it into roif ro is empty then exit mouseUpput fileDataSize(ro) into NumberOfBytesif gXCMDError is not empty thenanswer gXCMDErrorexit mouseUpend ifanswer "La taille de la section donn├⌐es du fichier ┬½ " & ro & " ┬╗ est de " && NumberOfBytes/1000┬¼ --Γêå&& " Ko.  (soit " && NumberOfBytes/1000000 && " Mo)." --Γêåput empty into roend mouseUp</script>
  158.     </part>
  159.     <part>
  160.         <id>8</id>
  161.         <type>field</type>
  162.         <visible> <true /> </visible>
  163.         <dontWrap> <true /> </dontWrap>
  164.         <dontSearch> <false /> </dontSearch>
  165.         <sharedText> <false /> </sharedText>
  166.         <fixedLineHeight> <true /> </fixedLineHeight>
  167.         <autoTab> <false /> </autoTab>
  168.         <lockText> <true /> </lockText>
  169.         <rect>
  170.             <left>65532</left>
  171.             <top>0</top>
  172.             <right>320</right>
  173.             <bottom>115</bottom>
  174.         </rect>
  175.         <style>transparent</style>
  176.         <autoSelect> <false /> </autoSelect>
  177.         <showLines> <false /> </showLines>
  178.         <wideMargins> <false /> </wideMargins>
  179.         <multipleLines> <false /> </multipleLines>
  180.         <reservedFamily> 0 </reservedFamily>
  181.         <titleWidth>0</titleWidth>
  182.         <icon>0</icon>
  183.         <textAlign>center</textAlign>
  184.         <font>Geneva</font>
  185.         <textSize>12</textSize>
  186.         <textStyle>plain</textStyle>
  187.         <textHeight>16</textHeight>
  188.         <name></name>
  189.         <script></script>
  190.     </part>
  191.     <part>
  192.         <id>7</id>
  193.         <type>button</type>
  194.         <visible> <true /> </visible>
  195.         <reserved5> 0 </reserved5>
  196.         <reserved4> 0 </reserved4>
  197.         <reserved3> 0 </reserved3>
  198.         <reserved2> 0 </reserved2>
  199.         <reserved1> 0 </reserved1>
  200.         <enabled> <true /> </enabled>
  201.         <rect>
  202.             <left>68</left>
  203.             <top>178</top>
  204.             <right>260</right>
  205.             <bottom>199</bottom>
  206.         </rect>
  207.         <style>shadow</style>
  208.         <showName> <true /> </showName>
  209.         <highlight> <false /> </highlight>
  210.         <autoHighlight> <true /> </autoHighlight>
  211.         <sharedHighlight> <true /> </sharedHighlight>
  212.         <family>0</family>
  213.         <titleWidth>0</titleWidth>
  214.         <icon>0</icon>
  215.         <textAlign>center</textAlign>
  216.         <font>Chicago</font>
  217.         <textSize>12</textSize>
  218.         <textStyle>plain</textStyle>
  219.         <name>├ëditer les scripts</name>
  220.         <script>on mouseUpglobal FileName,TtxtLimit,Ro,Index,Partition,theExtractput No into Partitionput "" into adviceif the optionKey is down thenput yes into Partitionput ", avec partition automatique" into adviceend ifput "" into TtxtLimitput "" into theExtractset lockMessages to trueset lockRecent to truehide Msgpush cardlock screengo stack ("la pile ├á ├⌐diter" & advice)if the result Γëá "" thenexit mouseUpend ifset the cantAbort of this stack to trueput the short name of this stack into Ro -- the name of the target to editput ro into maxNamerepeat with i = 31 down to 24if the length of maxName = i then delete char i of maxNameend repeatask file "Enregistrer l'├⌐dition des scripts sousΓǪ" with maxName & "'Scpt"if the result Γëá "" thenpop cdset the cantAbort of this stack to falseexit mouseUpend ifput it into FileNameput 1 into Indexif Partition = yes then put validName(FileName) into FileNameopen file FileNameset cursor to watchput the time & " ΓÇö " & the long date &return ┬¼&"Γùè Document r├⌐alis├⌐ avec ┬½ ├ëditer les scripts ┬╗ - Version 2.1.2 par Roberto Minotti & Jean Patrick Wendt. Γùè" ┬¼& return & return & "Pour une parfaite lisibilit├⌐ de ce document, utilisez la " ┬¼&"police Monaco 9 points." & return & return into theExtractput the length of theExtract into TtxtLimitwrite theExtract to file FileNameget the script of this stackif it = "" then put "Pas de script de Pile" into itput theLines(2) &&"SCRIPT DE PILE ┬½ " & Ro &" ┬╗" & theLines(2) &return┬¼& it & return into theExtractmayWriteExtractplay "Boing"play "Sifflement"answer firstAnswer() with "Suffisant" or "Continuer"if it is "Suffisant" thenclose file FileNamepop cdset the cantAbort of this stack to falseexit mouseUpend ifput the number of bgs of this stack into Nrepeat with i = 1 to Ngo bg igetAllScripts FOND,"bg",iput theLines(8) &return &return into theExtractmayWriteExtractend repeatput theLines(3) &"    This is the End, my only friend. - J.Morrison.     "┬¼&theLines(3) into theExtractmayWriteExtractclose file fileNamepop Cdplay "Sifflement"play "Hourra"answer lastAnswer() with "So good" -- Γêåset the cantAbort of this stack to falseput "" into fileNameput "" into theExtracthide Msgend mouseUpon getAllScripts fOwner,owner,pscanScripts fOwner,owner,pput theLines(4) &return into theExtractmayWriteExtractrepeat with k = 1 to number of cds of this bggo cd (k) of this bgput the number of this cd into NumCdscanScripts CARTE,"cd",NumCdend repeatend getAllScriptson scanScripts fOwner,owner,pglobal EmptyList,fileName,theExtractput return & theLines(2) && fOwner&& p &&"┬½"&(the short name of (owner && p))┬¼&"┬╗"&& theLines(2) &return into theExtractmayWriteExtractif script of (owner && p) = "" thenput "Γùè " &fOwner&&"┬½"& the short name of (owner && p) & "┬╗Γùè" after emptyListelseput return & theLines(2) && "SCRIPT DE " & fOwner && p ┬¼& return & script of (owner&&p) & return into theExtractmayWriteExtractend ifif the number of (owner && flds) Γëá 0 thenput theLines(2) && "LES CHAMPS DE " & fOwner & return into theExtractmayWriteExtractrepeat with j = 1 to number of (owner &&flds)set cursor to busygetObjScript fOwner,owner,CHAMP,Chp,"fld",jend repeatend ifif the number of (owner && btns) Γëá 0 thenput return &theLines(2) && "LES BOUTONS DE " & fOwner┬¼& return into theExtractmayWriteExtractrepeat with j = 1 to number of (owner &&btns)set cursor to busygetObjScript fOwner,owner,BOUTON,Btn,"btn",jend repeatend ifif EmptyList Γëá "" thenput return & "ΓùèΓùè Objet(s) dans"&&fOwner&&p&&"sans script : "┬¼& EmptyList &return into theExtractmayWriteExtractput "" into EmptyListend ifend scanScriptson getObjScript fOwner,owner,fObj,shortObj,obj,jglobal EmptyList,FileName,theExtractget script of (owner && obj && j)if it = "" or the number of words of it <5 thenput "Γùè " &shortObj&&"┬½"& the short name of (owner && obj && j) & "┬╗Γùè" after EmptyListexit getObjScriptelse put theLines(1) && fObj && j &" : ┬½"& the short name of┬¼(owner && obj && j) &"┬╗" & return & it & return into theExtractmayWriteExtractend getObjScripton mayWriteExtractglobal TtxtLimit, FileName,Partition,theExtractset cursor to watchput the length of theExtract into extractLengthadd extractLength to TtxtLimitif Partition = yes thenif TtxtLimit >31000 thenput extractLength-(TtxtLimit-31000) into cutCharput char 1 to (cutChar) of theExtract into part1get the number of lines of part1put line 1 to (it-1) of theExtract into part1put line (it) to (the number of lines of theExtract) of theExtract into part2put part1 into theExtractrepeat with j =(number of lines of part1) down to 1set cursor to busyif word 1 of line j of part1 = "on" thenput line 1 to j-1 of part1 into theExtractput line j to (the number of lines of part1)┬¼of part1 before part2exit repeatend ifend repeatwrite theExtract to file FileNameput part2 into theExtractcreateNewFilewrite theExtract to file FileNameput (the length of part2) + 60 into TtxtLimitelse if theExtract Γëá "" then write theExtract to file FileNameput "" into theExtractend ifif theExtract Γëá "" then write theExtract to file FileNameput "" into theExtractend mayWriteExtracton createNewFileglobal Filename,Index,Roset cursor to watchclose file FileNameadd 1 to Indexif Index >99 thenbeep 2answer "Les scripts de la pile ┬½"&Ro&"┬╗ d├⌐j├á r├⌐cup├⌐r├⌐s, repr├⌐sentent 3 Mo de texte "┬¼&"enregistr├⌐s sur 99 fichiers." &return&return& "C'est le nombre maximum de partitions "┬¼&"autoris├⌐es par le programme ΓǪ" with D├⌐sol├⌐pop cdset the cantAbort of this stack to falseexit to HyperCardend ifput Index into last word of FileNameopen file FileNamewrite "Suite "& Index &" des scripts de " & Ro &return&return to file FileNameend createNewFilefunction validName temprepeat with i = (the length of temp) down to 1if char i of temp Γëá ":" thenput char i of temp before itsNameelse exit repeatend repeatput length(itsName) - 28 into Kif K >0 thenrepeat Kdelete last char of tempend repeatend ifput " 1" after last word of tempreturn tempend validNamefunction firstAnswerglobal Ro,Index,TtxtLimit,Partitionput (round(TtxtLimit /102.4))/10 into PTxtput " ΓÇó Le script de la pile ┬½ "& Ro &" ┬╗ est ├⌐dit├⌐ ΓÇó" &return into theAnswerif Partition = No thenput "Il fait " & Ptxt & " Ko."&return& "Γùè SimpleText est limit├⌐ ├á 31 Ko ; "┬¼&"pour une partition automatique, recommencez avec la touche Option." & return &return after theAnswerelse put " Il se trouve sur " &Index& " fichier(s)"┬¼&" ├⌐ditable(s) par SimpleText." & return & return after theAnswerput "ΓÇó Voulez-vous ├⌐diter la TOTALIT├ë de la pile ?" after theAnswerput the length of TheAnswer -- mise au pointreturn theAnswerend firstAnswerfunction lastAnswerglobal Ro,Index,TtxtLimit,Partitionput (round(TtxtLimit /102.4))/10 into PTxtput " L'├⌐dition de tous les scripts de la pile ┬½" &Ro ┬¼&"┬╗ est termin├⌐e." & return into theAnswerif Partition = No thenput "ΓÇó Le fichier contient " &PTxt&" Ko de texte ; SimpleText "┬¼&"ne peut ouvrir plus de 31 Ko."& return& "ΓÇó Pour partitionner, "┬¼&"recommencez avec la touche Option enfonc├⌐e."after theAnswerelseif index = 1 thenput return&"ΓÇó Son fichier de "&PTxt& " Ko de texte "┬¼&"est directement ├⌐ditable par SimpleText." after theAnswerelse put return&"ΓÇó Elle est r├⌐partie sur "&index&" fichiers "┬¼&"directement ├⌐ditables par SimpleText." after theAnswerend ifput the length of TheAnswer -- mise au pointreturn theAnswerend lastAnswerfunction theLines Qrepeat Qput "ΓÇó-ΓÇó-ΓÇó-ΓÇó-" after bulletsend repeatdelete last char of bulletsreturn bulletsend theLines</script>
  221.     </part>
  222.     <part>
  223.         <id>9</id>
  224.         <type>button</type>
  225.         <visible> <true /> </visible>
  226.         <reserved5> 0 </reserved5>
  227.         <reserved4> 0 </reserved4>
  228.         <reserved3> 0 </reserved3>
  229.         <reserved2> 0 </reserved2>
  230.         <reserved1> 0 </reserved1>
  231.         <enabled> <true /> </enabled>
  232.         <rect>
  233.             <left>34</left>
  234.             <top>19</top>
  235.             <right>55</right>
  236.             <bottom>40</bottom>
  237.         </rect>
  238.         <style>shadow</style>
  239.         <showName> <false /> </showName>
  240.         <highlight> <false /> </highlight>
  241.         <autoHighlight> <true /> </autoHighlight>
  242.         <sharedHighlight> <true /> </sharedHighlight>
  243.         <family>0</family>
  244.         <titleWidth>0</titleWidth>
  245.         <icon>0</icon>
  246.         <textAlign>center</textAlign>
  247.         <font>Chicago</font>
  248.         <textSize>12</textSize>
  249.         <textStyle>plain</textStyle>
  250.         <name></name>
  251.         <script>on mouseupplay "1" with loopgo card "deux"end mouseup</script>
  252.     </part>
  253.     <content>
  254.         <layer>card</layer>
  255.         <id>8</id>
  256.         <text><span class="style16">├ëditer les scripts</span><span class="style17"> version 2.1.2 par </span><span class="style16">Roberto Minotti</span><span class="style17"> et </span><span class="style16">Jean Patrick Wendt</span><span class="style17">  Utilitaire d'aide ├á la programmation.des piles HypercardΓäó.</span></text>
  257.     </content>
  258.     <name>un</name>
  259.     <script></script>
  260. </card>
  261.  
  262.  
  263.